home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / chbgv.z / chbgv
Text File  |  1996-03-14  |  5KB  |  133 lines
  1.  
  2.  
  3.  
  4. CCCCHHHHBBBBGGGGVVVV((((3333FFFF))))                                                            CCCCHHHHBBBBGGGGVVVV((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      CHBGV - compute all the eigenvalues, and optionally, the eigenvectors of
  10.      a complex generalized Hermitian-definite banded eigenproblem, of the form
  11.      A*x=(lambda)*B*x
  12.  
  13. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  14.      SUBROUTINE CHBGV( JOBZ, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, W, Z, LDZ,
  15.                        WORK, RWORK, INFO )
  16.  
  17.          CHARACTER     JOBZ, UPLO
  18.  
  19.          INTEGER       INFO, KA, KB, LDAB, LDBB, LDZ, N
  20.  
  21.          REAL          RWORK( * ), W( * )
  22.  
  23.          COMPLEX       AB( LDAB, * ), BB( LDBB, * ), WORK( * ), Z( LDZ, * )
  24.  
  25. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  26.      CHBGV computes all the eigenvalues, and optionally, the eigenvectors of a
  27.      complex generalized Hermitian-definite banded eigenproblem, of the form
  28.      A*x=(lambda)*B*x. Here A and B are assumed to be Hermitian and banded,
  29.      and B is also positive definite.
  30.  
  31.  
  32. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  33.      JOBZ    (input) CHARACTER*1
  34.              = 'N':  Compute eigenvalues only;
  35.              = 'V':  Compute eigenvalues and eigenvectors.
  36.  
  37.      UPLO    (input) CHARACTER*1
  38.              = 'U':  Upper triangles of A and B are stored;
  39.              = 'L':  Lower triangles of A and B are stored.
  40.  
  41.      N       (input) INTEGER
  42.              The order of the matrices A and B.  N >= 0.
  43.  
  44.      KA      (input) INTEGER
  45.              The number of superdiagonals of the matrix A if UPLO = 'U', or
  46.              the number of subdiagonals if UPLO = 'L'. KA >= 0.
  47.  
  48.      KB      (input) INTEGER
  49.              The number of superdiagonals of the matrix B if UPLO = 'U', or
  50.              the number of subdiagonals if UPLO = 'L'. KB >= 0.
  51.  
  52.      AB      (input/output) COMPLEX array, dimension (LDAB, N)
  53.              On entry, the upper or lower triangle of the Hermitian band
  54.              matrix A, stored in the first ka+1 rows of the array.  The j-th
  55.              column of A is stored in the j-th column of the array AB as
  56.              follows:  if UPLO = 'U', AB(ka+1+i-j,j) = A(i,j) for max(1,j-
  57.              ka)<=i<=j; if UPLO = 'L', AB(1+i-j,j)    = A(i,j) for
  58.              j<=i<=min(n,j+ka).
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. CCCCHHHHBBBBGGGGVVVV((((3333FFFF))))                                                            CCCCHHHHBBBBGGGGVVVV((((3333FFFF))))
  71.  
  72.  
  73.  
  74.              On exit, the contents of AB are destroyed.
  75.  
  76.      LDAB    (input) INTEGER
  77.              The leading dimension of the array AB.  LDAB >= KA+1.
  78.  
  79.      BB      (input/output) COMPLEX array, dimension (LDBB, N)
  80.              On entry, the upper or lower triangle of the Hermitian band
  81.              matrix B, stored in the first kb+1 rows of the array.  The j-th
  82.              column of B is stored in the j-th column of the array BB as
  83.              follows:  if UPLO = 'U', BB(kb+1+i-j,j) = B(i,j) for max(1,j-
  84.              kb)<=i<=j; if UPLO = 'L', BB(1+i-j,j)    = B(i,j) for
  85.              j<=i<=min(n,j+kb).
  86.  
  87.              On exit, the factor S from the split Cholesky factorization B =
  88.              S**H*S, as returned by CPBSTF.
  89.  
  90.      LDBB    (input) INTEGER
  91.              The leading dimension of the array BB.  LDBB >= KB+1.
  92.  
  93.      W       (output) REAL array, dimension (N)
  94.              If INFO = 0, the eigenvalues in ascending order.
  95.  
  96.      Z       (output) COMPLEX array, dimension (LDZ, N)
  97.              If JOBZ = 'V', then if INFO = 0, Z contains the matrix Z of
  98.              eigenvectors, with the i-th column of Z holding the eigenvector
  99.              associated with W(i). The eigenvectors are normalized so that
  100.              Z**H*B*Z = I.  If JOBZ = 'N', then Z is not referenced.
  101.  
  102.      LDZ     (input) INTEGER
  103.              The leading dimension of the array Z.  LDZ >= 1, and if JOBZ =
  104.              'V', LDZ >= N.
  105.  
  106.      WORK    (workspace) COMPLEX array, dimension (N)
  107.  
  108.      RWORK   (workspace) REAL array, dimension (3*N)
  109.  
  110.      INFO    (output) INTEGER
  111.              = 0:  successful exit
  112.              < 0:  if INFO = -i, the i-th argument had an illegal value
  113.              > 0:  if INFO = i, and i is:
  114.              <= N:  the algorithm failed to converge:  i off-diagonal elements
  115.              of an intermediate tridiagonal form did not converge to zero; >
  116.              N:   if INFO = N + i, for 1 <= i <= N, then CPBSTF
  117.              returned INFO = i: B is not positive definite.  The factorization
  118.              of B could not be completed and no eigenvalues or eigenvectors
  119.              were computed.
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.